(revert-buffer): Use new insert-file-contents replace arg.

diff --git a/lisp/files.el b/lisp/files.el
index 16ba5280be9627221ed9a104a9bf8777cd574b02..7efca8ac1881c21b5cc81242ff2f75248f57508b 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1805,9 +1805,9 @@ beginning and `after-revert-hook' at the end."
                 ;; so that we don't try to lock the file.
                 (let ((buffer-file-name nil))
                   (or auto-save-p
-                      (unlock-buffer))
-                  (erase-buffer))
-                (insert-file-contents file-name (not auto-save-p))))
+                      (unlock-buffer)))
+                (insert-file-contents file-name (not auto-save-p)
+                                      nil nil t)))
             (goto-char (min opoint (point-max)))
             (after-find-file nil nil t)
             (run-hooks 'after-revert-hook)